object Form4: TForm4 Left = 336 Top = 224 ActiveControl = ListBox1 AutoScroll = False AutoSize = True Caption = 'Efekty - jen Internet explorer' ClientHeight = 209 ClientWidth = 289 Color = clBlack Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] FormStyle = fsStayOnTop Icon.Data = {} OldCreateOrder = False Position = poMainFormCenter OnClose = FormClose OnShow = FormShow PixelsPerInch = 96 TextHeight = 13 object Label1: TLabel Left = 0 Top = 24 Width = 36 Height = 13 Caption = 'Udalost' Font.Charset = DEFAULT_CHARSET Font.Color = clWhite Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False end object Label3: TLabel Left = 0 Top = 80 Width = 108 Height = 13 Caption = 'Duration min-1, max-15' Font.Charset = DEFAULT_CHARSET Font.Color = clWhite Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False end object Label4: TLabel Left = 32 Top = 104 Width = 5 Height = 13 Caption = 's' Color = clBlack Font.Charset = DEFAULT_CHARSET Font.Color = clWhite Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentColor = False ParentFont = False end object Label2: TLabel Left = 112 Top = 24 Width = 25 Height = 13 Caption = 'Efekt' Font.Charset = DEFAULT_CHARSET Font.Color = clWhite Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False end object Image1: TImage Left = 8 Top = 160 Width = 88 Height = 28 AutoSize = True Center = True Picture.Data = {} end object Label5: TLabel Left = 24 Top = 0 Width = 234 Height = 24 Caption = 'Efekty - jen Internet explorer' Font.Charset = DEFAULT_CHARSET Font.Color = clWhite Font.Height = -21 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False end object ComboBox1: TComboBox Left = 0 Top = 40 Width = 97 Height = 21 Style = csDropDownList ItemHeight = 13 TabOrder = 0 Items.Strings = ( 'Page-Enter' 'Page-Exit' 'Site-Enter' 'Site-Exit') end object Edit1: TEdit Left = 0 Top = 96 Width = 25 Height = 21 AutoSize = False MaxLength = 2 TabOrder = 1 Text = '1' end object ListBox1: TListBox Left = 112 Top = 40 Width = 177 Height = 145 ItemHeight = 13 Items.Strings = ( 'Blend' 'Box in' 'Box out' 'Circle in' 'Circle out' 'Wipe up' 'Wipe down' 'Wipe right' 'Wipe left' 'Vertical blinds' 'Checkerboard across' 'Checkerboard down' 'Random dissolve' 'Split vertical in' 'Split vertical out' 'Split horizontal in' 'Split horizontal out' 'Strips left down' 'Strips left up' 'Strips right down' 'Strips right up' 'Random bars horizontal' 'Random bars vertical' 'Random') TabOrder = 2 end object Button1: TButton Left = 48 Top = 192 Width = 75 Height = 17 Caption = 'OK' TabOrder = 3 OnClick = Button1Click end object Button2: TButton Left = 168 Top = 192 Width = 73 Height = 17 Caption = 'Cancel' TabOrder = 4 OnClick = Button2Click end end